home *** CD-ROM | disk | FTP | other *** search
/ Champak 120 / Vol 120.iso / games / funny_te.swf / scripts / DefineSprite_18 / frame_1 / DoAction.as
Encoding:
Text File  |  2010-11-09  |  6.3 KB  |  243 lines

  1. function pro(type, full, name)
  2. {
  3.    this.type = type;
  4.    this.full = full;
  5.    this.name = name;
  6. }
  7. function setnull(m1, m2)
  8. {
  9.    all[m1][m2].name = "";
  10.    all[m1][m2].type = 0;
  11.    all[m1][m2].full = true;
  12. }
  13. function setfull(h1, h2)
  14. {
  15.    all[h1][h2].name = "/an" add total;
  16.    all[h1][h2].type = num;
  17.    all[h1][h2].full = false;
  18. }
  19. function toleft()
  20. {
  21.    if(Key.isDown(Key.LEFT) and all[xline - 1][yline].full == true and all[xline][yline + 1].full == true)
  22.    {
  23.       setnull(xline,yline);
  24.       xline -= 1;
  25.       setProperty("/an" add total, _X, xpos + xline * xwid);
  26.       setfull(xline,yline);
  27.    }
  28. }
  29. function toright()
  30. {
  31.    if(Key.isDown(Key.RIGHT) and all[xline + 1][yline].full == true and all[xline][yline + 1].full == true)
  32.    {
  33.       setnull(xline,yline);
  34.       xline += 1;
  35.       setProperty("/an" add total, _X, xpos + xline * xwid);
  36.       setfull(xline,yline);
  37.    }
  38. }
  39. function todown()
  40. {
  41.    if(Key.isDown(Key.DOWN) and an != 56 and all[xline][yline + 1].full == true)
  42.    {
  43.       u = 11;
  44.       while(1 < u)
  45.       {
  46.          if(all[xline][u].full == true)
  47.          {
  48.             setnull(xline,yline);
  49.             yline = u;
  50.             setfull(xline,yline);
  51.             setProperty("/an" add total, _Y, ypos + yline * ywid);
  52.             break;
  53.          }
  54.          u--;
  55.       }
  56.    }
  57. }
  58. function toall()
  59. {
  60.    toleft();
  61.    toright();
  62.    todown();
  63. }
  64. function downall()
  65. {
  66.    ux = 1;
  67.    while(5 >= ux)
  68.    {
  69.       uy = 11;
  70.       while(1 < uy)
  71.       {
  72.          if(all[ux][uy].full == true and all[ux][uy - 1].full == false)
  73.          {
  74.             setProperty(all[ux][uy - 1].name, _Y, ypos + uy * ywid);
  75.             all[ux][uy].name = all[ux][uy - 1].name;
  76.             all[ux][uy].type = all[ux][uy - 1].type;
  77.             all[ux][uy].full = false;
  78.             setnull(ux,uy - 1);
  79.          }
  80.          uy--;
  81.       }
  82.       ux++;
  83.    }
  84. }
  85. function removex()
  86. {
  87.    jy = 11;
  88.    while(jy >= 2)
  89.    {
  90.       if(all[1][jy].type == all[2][jy].type and all[1][jy].type == all[3][jy].type and all[1][jy].type == all[4][jy].type and all[1][jy].type == all[5][jy].type and all[1][jy].full == false)
  91.       {
  92.          removeMovieClip(all[1][jy].name);
  93.          setnull(1,jy);
  94.          removeMovieClip(all[2][jy].name);
  95.          setnull(2,jy);
  96.          removeMovieClip(all[3][jy].name);
  97.          setnull(3,jy);
  98.          removeMovieClip(all[4][jy].name);
  99.          setnull(4,jy);
  100.          removeMovieClip(all[5][jy].name);
  101.          setnull(5,jy);
  102.          _root.score.text += 30;
  103.          break;
  104.       }
  105.       jjy = 1;
  106.       while(2 >= jjy)
  107.       {
  108.          if(all[jjy][jy].type == all[jjy + 1][jy].type and all[jjy][jy].type == all[jjy + 2][jy].type and all[jjy][jy].type == all[jjy + 3][jy].type and all[jjy][jy].full == false)
  109.          {
  110.             removeMovieClip(all[jjy][jy].name);
  111.             setnull(jjy,jy);
  112.             removeMovieClip(all[jjy + 1][jy].name);
  113.             setnull(jjy + 1,jy);
  114.             removeMovieClip(all[jjy + 2][jy].name);
  115.             setnull(jjy + 2,jy);
  116.             removeMovieClip(all[jjy + 3][jy].name);
  117.             setnull(jjy + 3,jy);
  118.             _root.score.text += 20;
  119.             break;
  120.          }
  121.          jjy++;
  122.       }
  123.       jjy = 1;
  124.       while(3 >= jjy)
  125.       {
  126.          if(all[jjy][jy].type == all[jjy + 1][jy].type and all[jjy][jy].type == all[jjy + 2][jy].type and all[jjy][jy].full == false)
  127.          {
  128.             removeMovieClip(all[jjy][jy].name);
  129.             setnull(jjy,jy);
  130.             removeMovieClip(all[jjy + 1][jy].name);
  131.             setnull(jjy + 1,jy);
  132.             removeMovieClip(all[jjy + 2][jy].name);
  133.             setnull(jjy + 2,jy);
  134.             _root.score.text += 10;
  135.             break;
  136.          }
  137.          jjy++;
  138.       }
  139.       jy--;
  140.    }
  141. }
  142. function removey()
  143. {
  144.    b1 = 1;
  145.    while(5 >= b1)
  146.    {
  147.       b2 = 11;
  148.       while(b2 >= 7)
  149.       {
  150.          if(all[b1][b2].type == all[b1][b2 - 1].type and all[b1][b2].type == all[b1][b2 - 2].type and all[b1][b2].type == all[b1][b2 - 3].type and all[b1][b2].type == all[b1][b2 - 4].type and all[b1][b2].full == false)
  151.          {
  152.             removeMovieClip(all[b1][b2].name);
  153.             setnull(b1,b2);
  154.             removeMovieClip(all[b1][b2 - 1].name);
  155.             setnull(b1,b2 - 1);
  156.             removeMovieClip(all[b1][b2 - 2].name);
  157.             setnull(b1,b2 - 2);
  158.             removeMovieClip(all[b1][b2 - 3].name);
  159.             setnull(b1,b2 - 3);
  160.             removeMovieClip(all[b1][b2 - 4].name);
  161.             setnull(b1,b2 - 4);
  162.             _root.score.text += 30;
  163.          }
  164.          b2--;
  165.       }
  166.       b2 = 11;
  167.       while(b2 >= 6)
  168.       {
  169.          if(all[b1][b2].type == all[b1][b2 - 1].type and all[b1][b2].type == all[b1][b2 - 2].type and all[b1][b2].type == all[b1][b2 - 3].type and all[b1][b2].full == false)
  170.          {
  171.             removeMovieClip(all[b1][b2].name);
  172.             setnull(b1,b2);
  173.             removeMovieClip(all[b1][b2 - 1].name);
  174.             setnull(b1,b2 - 1);
  175.             removeMovieClip(all[b1][b2 - 2].name);
  176.             setnull(b1,b2 - 2);
  177.             removeMovieClip(all[b1][b2 - 3].name);
  178.             setnull(b1,b2 - 3);
  179.             _root.score.text += 20;
  180.          }
  181.          b2--;
  182.       }
  183.       b2 = 11;
  184.       while(b2 >= 5)
  185.       {
  186.          if(all[b1][b2].type == all[b1][b2 - 1].type and all[b1][b2].type == all[b1][b2 - 2].type and all[b1][b2].full == false)
  187.          {
  188.             removeMovieClip(all[b1][b2].name);
  189.             setnull(b1,b2);
  190.             removeMovieClip(all[b1][b2 - 1].name);
  191.             setnull(b1,b2 - 1);
  192.             removeMovieClip(all[b1][b2 - 2].name);
  193.             setnull(b1,b2 - 2);
  194.             _root.score.text += 10;
  195.          }
  196.          b2--;
  197.       }
  198.       b1++;
  199.    }
  200. }
  201. function removeall()
  202. {
  203.    removey();
  204.    downall();
  205.    removex();
  206.    downall();
  207. }
  208. _root.score.text = 0;
  209. m = 1;
  210. while(5 >= m)
  211. {
  212.    n = 11;
  213.    while(n >= 1)
  214.    {
  215.       if(all[m][n].full == false)
  216.       {
  217.          removeMovieClip(all[m][n].name);
  218.       }
  219.       n--;
  220.    }
  221.    m++;
  222. }
  223. total = 0;
  224. xline = 3;
  225. yline = 1;
  226. xwid = getProperty("/pic1", _width);
  227. ywid = getProperty("/pic1", _height);
  228. xpos = 265.4 + xwid / 2 - xline * xwid;
  229. ypos = 390 + ywid / 2 - ywid * 11;
  230. all = new Array();
  231. i = 1;
  232. while(5 >= i)
  233. {
  234.    all[i] = new Array();
  235.    j = 1;
  236.    while(10 >= j)
  237.    {
  238.       all[i][j] = new pro(99,true,"");
  239.       j++;
  240.    }
  241.    i++;
  242. }
  243.